home *** CD-ROM | disk | FTP | other *** search
Text File | 1990-06-24 | 996 b | 63 lines | [TEXT/MPS ] |
- {**********************************************************************
- {*
- {* Teach uWindow -- Version 3.0 (interface)
- {*
- {* Copyright (c)
- {* Apple Computer, Inc. 1986-1990
- {* All Rights Reserved.
- {*
- {* Developer Technical Support Apple II Sample Code
- {*
- {* This file contains the interface to the code which implements
- {* windows in the Teach program.
- {*
- {**********************************************************************}
-
- UNIT uWindow;
-
- INTERFACE
-
- USES
-
- types,
- locator,
- misctool,
- quickdraw,
- fonts,
- MEMORY,
- intMath,
- events,
- controls,
- windows,
- dialogs,
- menus,
- DESK,
- STDFILE,
- GSOS,
- resources,
- TextEdit,
- PasLibIntf,
-
-
- uGlobals,
- uUtils;
-
-
- procedure setUpWindows; {Initialize variables for stacking windows}
- procedure drawThisWindow;
- procedure doCloseTop;
- procedure doOpenWindow;
- procedure doNewWindow;
- procedure doSave;
- procedure doSaveAs;
-
-
- IMPLEMENTATION
-
- {$I uWindow.inc.p }
-
-
-
-
- END.
-